home *** CD-ROM | disk | FTP | other *** search
/ Manchester United on CD / Manchester United on CD.iso / mainmenu.dxr / Internal_14_display airport sign on rollover and do action on mouseup.ls < prev    next >
Encoding:
Text File  |  2000-08-30  |  1.2 KB  |  42 lines
  1. property psp_mysprite, pi_mylistpos
  2. global go_airportdisplaymaster, gl_airportdisplaylist, gsp_iconsprite, gs_whatclicked, gc_whichmovienext
  3.  
  4. on beginSprite me
  5.   psp_mysprite = sprite(me.spriteNum)
  6. end
  7.  
  8. on mouseEnter me
  9.   if gl_airportdisplaylist.count >= pi_mylistpos then
  10.     mylist = gl_airportdisplaylist[pi_mylistpos]
  11.     if objectp(go_airportdisplaymaster) then
  12.       go_airportdisplaymaster.changedisplayto(mylist.textlist)
  13.     end if
  14.     if objectp(gsp_iconsprite) then
  15.       gsp_iconsprite.changeicon(mylist.icon)
  16.     end if
  17.     sendAllSprites(#rollovertimeline, mylist.menuItem)
  18.   end if
  19. end
  20.  
  21. on mouseLeave me
  22.   sendAllSprites(#rollofftimeline)
  23. end
  24.  
  25. on mouseUp me
  26.   if gl_airportdisplaylist.count >= pi_mylistpos then
  27.     mylist = gl_airportdisplaylist[pi_mylistpos]
  28.     gs_whatclicked = mylist.mouseuplist.whatclicked
  29.     if mylist.mouseuplist.action = #marker then
  30.       go(mylist.mouseuplist.targetname)
  31.     end if
  32.     if mylist.mouseuplist.action = #movie then
  33.       gc_whichmovienext = mylist.mouseuplist.targetname
  34.       go("slide out")
  35.     end if
  36.   end if
  37. end
  38.  
  39. on getPropertyDescriptionList me
  40.   return [#pi_mylistpos: [#comment: "pi_mylistpos:", #format: #integer, #default: 1]]
  41. end
  42.